11551 X(1)¢X(1)+X<3)*fY-Xi?}I/1555:X(2>=Y:X(6)¤X<1)~Xt4> 11552 Y$=5TR$(Y>:GDTG11555 11155 Y1$=“NGPU CURRENT—LIHIT“:REH*##23 11151 IFY<BURY>9.99THENBUTD14955 11152 Y¤INT(Y¥155)1Xi11l=1B:IFY<155THEN11154 11153 Y5$="55R"+RIGHT$<STR§(Y).LEN(5TR$(Y)J-1)+"A":GQTD11157 11154 Y=Y*15:X<11}=1:IFY<155THEN11156 11155 Y5$="51R"+RIGHT%(5TR5(Y).LEN(5TRw<Y))~1)+"A"ZGUTG1115? 11156 Y=Y¥15:X(11)¤5.1:Y5$="52R"+STR$(Y)+"A" 11157 IECUUTNGPU.Y5$:RETURN 11155 Y1$="NGPU UGhTHGE-5ET."!REH**¥*24 11151 IFY{5.1URY>75THENGDTU14?55 11152 Y55¤"55"+RIGHT$(5TR$(INT<YK15+.5)).LEN(5TR$(INT<Y*15+.5)>J~1P 11153 Y5$=RIGHT§(Y5$.3}+"U":IEHDUT NGPU.Y5§:RETURN 11154 RETURN 11285 ·r1z¤¤*·—··—·~·..· ———— —·——--····:R|;r1x=rn=1k¤txc1kz15 11251 RETURN 11255 Y1$=" ---- ~~—~~~——--":REH*#$##*¥26 11251 RETURN 11355 Y1$="AF-FREGU.MEAS.“:REH*#***tX27 11351 IFY5$="P"THENY3$="AP"!BUTD11312 11354 IFYH<>5 AND YE<>1 THEN YE=5 11356 GNYE+1G¤TD11358.11325 11359 Y3$¤"hP1“ 11312 Y5$wY3$+".”:GU3UB16515:GUSUH16555 11313 Y=<INT(1B5B#UAL(HID%(Y5$.3.9))+.5))/1555:IFY3>5THENGDSUB14255 11314 IFY3>5TH N11312 11315 IFLEFT$(Y5$.2>=LEFT$(Y3§.2}THENRETURN 11316 GDTD14?55 11325 Y3$="hP.1" 11322 Y5$=Y3$+".“IGUSUB16518LIFY3>5THENGDSUB14255 11323 GMSUB1655B:T=(INT(155tU¤L(HID$(Y5%.3.9)1))/1555:IFY3}8THEN11322 11324 IFLEFT$<Y5$.2)=LEFT$(T3$.2)TH€NNNRETURN 11325 GUTG14955 11355 Y1$="HF-LEVEL-HERB."LREM*lX*¥¥*2B 11351 Y5$="HX."IGDSUEIABIEEIFY3>5THENGDSUB14255 11352 GD5UR16555LY¤(INTE1558B*UHL<HID$(Y5$.3.PPI!)/1B:IFY3>5THEN11351 11353 IFLEFT$(Y5$.2>="AX"THENRETURN 11354 GDTD1495B 11455 Y15¤"DIGT. AT 5.3 KHZ"IREH*$##K29 11452 YE=1IGUSUH11455 11454 RETURN 11455 T15="¤F DI5TDRTIQN":REH****#**#35 11451 IFYE=5THENYE=3 11452 DNYEGDTUII454.11456.1145B 11454 YE=5:Y3$="ED"IGDTU11312 11456 IFYS$="A"THHN YE=5IT35="EG"IGUTD113l2 11457 GDTU14955 11458 YE¤5IY3$="EE"IGDTD11312 11468 GDTG14?58 11555 Y15¤"RF—PRUBE“:REM*#**I**¥*****31 11552 DNYEGDTD11554.11525 11554 YE=5:T5$="FL1":GUSUB16515iIFT3}5THENGUSU51425B 11556 GUSUB16555IY=1555*UAL{HID$(Y5G.3.9)J 11558 IFY3>5THEN11554 11515 IFLEFT$(Y5$.2>="FL"THENRETURN 11512 G5TD14955 11525 YE=5IY5$="FLB":GD5UE16B15:IFY3>5THENGBSUB14255 11522 GUSUB16555IY¤UAL(HID$(Y5$.3.9)1 11524 IFY3>5THEN11525 11526 IFLEFT$(Y5$.2)=“FL"THENRETURN 11528 GDTG1495B 11555 Y1$="RF~FREGU.RESPDNSE“:REH*#$*32 11551 GU3UE11554:Y=11GDSUE15P55 IUSUB11355IYi5)¤Y 11552 FURY?=LTUYQIY¤X(25+Y7)}BU5UB15755:GD5UB1135B 11553 YfY7:"{INT(255#LUG(Y/Y<5)D/LDG(1B)D1/15:NEXTY7:Y=1:GUTU15755 11554 Y?=1:GDTU11559 11555 FDRY¤1TDLEN(Y$> 11556 IF HIh$<Y$.Y.1>="."THEN11555